home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / E / EditString.cpt / EditString Stack / card_5438.txt < prev    next >
Text File  |  1990-06-22  |  2KB  |  67 lines
  1. -- card: 5438 from stack: in
  2. -- bmap block id: 8126
  3. -- flags: 0000
  4. -- background id: 3493
  5. -- name: right
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: A003
  11. -- rect: left=88 top=211 right=233 bottom=188
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: RIGHT
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   put editString("RIGHT", field A,cd fld num) into field B
  23. end mouseUp
  24.  
  25.  
  26.  
  27. -- part 2 (field)
  28. -- low flags: 00
  29. -- high flags: 0002
  30. -- rect: left=296 top=214 right=231 bottom=327
  31. -- title width / last selected line: 0
  32. -- icon id / first selected line: 0 / 0
  33. -- text alignment: 0
  34. -- font id: 97
  35. -- text size: 9
  36. -- style flags: 0
  37. -- line height: 12
  38. -- part name: num
  39.  
  40.  
  41. -- part contents for background part 1
  42. ----- text -----
  43. RIGHT
  44.  
  45. -- part contents for background part 2
  46. ----- text -----
  47. RIGHT will return a substring portion of the right side of an input string.  The function acts just like the BASIC language RIGHT$ function.  This function is limited to strings only and will ignore any characters past position 255.
  48.  
  49. -- part contents for background part 3
  50. ----- text -----
  51. editString("RIGHT", source, numChars)
  52. ‚Ä¢ source is the intput variable or field containing the text
  53. ‚Ä¢ numChars is the length of the desired substring
  54.  
  55. put editString("RIGHT", field A, 3) into field B   If field A is "abcdefg" the function will return "efg"
  56.  
  57. -- part contents for card part 2
  58. ----- text -----
  59. 3
  60.  
  61. -- part contents for background part 4
  62. ----- text -----
  63. abcdefg
  64.  
  65. -- part contents for background part 5
  66. ----- text -----
  67. efg